# make plots for depth over time
fishes <- unique(processed_data$fishNum)
for (fish in fishes) {
plot(processed_data[processed_data$fishNum == fish,]$pingNumber, -processed_data[processed_data$fishNum == fish,]$Target_true_depth, main = fish)
}
































































# make plots for depth over time with common depth scale
fishes <- unique(processed_data$fishNum)
for (fish in fishes) {
plot(processed_data[processed_data$fishNum == fish,]$pingNumber, -processed_data[processed_data$fishNum == fish,]$Target_true_depth, main = fish, ylim = c(-19, -9))
}
































































# function to look at one specific fish
specific_fish_ping_lag <- function(fishCode, indicator_n = 200){
fish_of_interest <- (data.frame(processed_data[processed_data$fishNum == fishCode, ]))
lst_of_ping <- c()
for (i in 1:(nrow(fish_of_interest) - 1)){
diff_t = fish_of_interest[i + 1,]$pingNumber - fish_of_interest[i,]$pingNumber
if ( diff_t >= indicator_n){
lst_of_ping <- c(lst_of_ping, i)
}
}
cat("Fish", fishCode, "pings:", lst_of_ping, "\n")
}
# sample usage
specific_fish_ping_lag("LT001", 100)
## Fish LT001 pings: 4 6 37 38 48 117 119
# generate starting ping numbers of gaps
fishes <- unique(processed_data$fishNum)
for (fish in fishes) {
specific_fish_ping_lag(fish)
}
## Fish LT001 pings: 6 38 48 117 119
## Fish LT003 pings: 270 449 540 560 667 881 916 995 1035 1064 1089 1091 1143 1173 1174 1178
## Fish LT004 pings: 4 51 90 313 381 399 495 505 707 725 748 760 767 861 866 867 883 933 936
## Fish LT005 pings: 5 17 29 44 45 46 132 197 203 331 394 401 415 446 504
## Fish LT006 pings: 18 31 62 120 128 131 141 159 161 222 256
## Fish LT007 pings: 9 36 60 83 102 116 192 201 260 270 285 339 355 373 410 452 470 513 594 598 619
## Fish LT009 pings: 18 51 73 326 356 382 388 407 468 471 479 646
## Fish LT010 pings: 5 57 74 78 80 91 104 112 116
## Fish LT011 pings: 11 21 90 246 330 399 446 449 506
## Fish LT012 pings: 109 154 165 166 221 320 359
## Fish LT013 pings: 2 19 37 59 67 70 101
## Fish LT014 pings: 45 74 1846 2046
## Fish LT015 pings: 121 170 172
## Fish LT016 pings: 10 415 1651 1853 1865
## Fish LT017 pings: 195 440 442 621 623 781 794 797
## Fish LT018 pings: 4 57 113
## Fish LT019 pings: 110 151 216 225 234 237
## Fish LT020 pings: 41 43 190 193 217 222 337 338 356 357 359 395
## Fish LT021 pings: 45 193 246 259 262
## Fish LT23001 pings: 16 69 115 150 213 215 295 400
## Fish LT23002 pings: 62 1318 1481 1640 1667 1679
## Fish LT23003 pings: 74 80 99 298
## Fish LT23004 pings:
## Fish LT23005 pings: 111
## Fish LT23007 pings: 627
## Fish LT23008 pings: 2 54 204 293 343
## Fish LT23009 pings: 917
## Fish LT23010 pings: 772 808 846 960
## Fish LT23011 pings: 155 214 219 225 278
## Fish LT23012 pings: 4
## Fish LT23013 pings: 6 165 192 232 302
## Fish LT23018 pings: 154 168
## Fish LWF001 pings: 143 155 205 301 341 419 478 551 783
## Fish LWF002 pings: 14 70 71 99 113 158 192 228 279 345 401 438
## Fish LWF003 pings: 117
## Fish LWF004 pings: 24 28 62 77 82 125 150 172 173 179 180 210
## Fish LWF005 pings: 14 33 48 78 265
## Fish LWF006 pings: 16 31 81 95 102 117
## Fish LWF007 pings: 9 27 57 68 75 160 182 187 198 203 231 249 277 280 291 303 333
## Fish LWF009 pings: 11 14 18
## Fish LWF010 pings: 35 181 287 315 346 408 474 480
## Fish LWF011 pings: 23 47 76 94 156 385 432 591 651 652 1027
## Fish LWF012 pings: 122 181 211 214 215 330 365 392 412 413 461
## Fish LWF013 pings: 81 121 303 396 443 513 559 564 627
## Fish LWF014 pings: 383 2251
## Fish LWF015 pings: 38 78
## Fish LWF23001 pings: 88 256 478
## Fish LWF23002 pings: 9 199 221 304 335 338
## Fish LWF23003 pings: 108 178 194 480 575 646
## Fish LWF23004 pings: 34 135 169 352 373
## Fish LWF23005 pings: 123 168
## Fish LWF23006 pings: 57 116 120 182 203
## Fish LWF23007 pings: 14 172 179 182 191
## Fish LWF23008 pings: 11 48 429 569 570 656
## Fish LWF23009 pings: 20 24 51 173 182 185 188
## Fish LWF23010 pings: 29 48 50 56
## Fish LWF23011 pings: 1 7 13 46 82
## Fish LWF23012 pings: 175
## Fish LWF23013 pings: 7 17 25 26 28 30
## Fish LWF23014 pings: 26 29
## Fish LWF23015 pings: 57 109 111 136 259 280 309
## Fish LWF23016 pings: 78 80 165 167 170 190
## Fish LWF23017 pings: 10 85 93 98 110 124
## Fish LWF23018 pings: